.text 
.global _start 
# Title: Euclid                		        	Filename: Euclid.s
# Author: Rodriguez Rojas Anthon Brayan 	                Date: 28 /03/17
# Description: funcion para copiar una cadena
# Input: -
# Output: maximo comun divisor
 
 @ r1 Esperando el primer numero
 @ r0 Esperando el segundo numero
 ############ Code Segment######################################################

_start: 
       .extern __c_copy 
       ldr r0, =.orig 
       ldr r1, =.dest 
       mov r2, #11 
       bl    __c_copy 
       ldr r0, =.dest 
       bl _imprime 
bl exit 
.global _imprime 
       _imprime: 
             stmdb sp!, {r0,r1,lr} 
             mov r1,r0 
             ldr r0, =.string 
             bl printf 
             ldmia sp!, {r0,r1,pc} 
.data 
.string: 
.asciz "%s\n" 
.orig: 
.asciz "Hola Mundo" 
.dest: 
.space 11 
.end